home *** CD-ROM | disk | FTP | other *** search
/ Computer Arts Interactive 4 / CARTS4.iso / mac / MiniCad 6.0.1 demo / MiniCad 6.0.1 Demo / MiniCad 6.0.1 Demo.rsrc / STR#_7024.txt < prev    next >
Text File  |  1996-03-22  |  750b  |  29 lines
  1. Receives two vectors and returns the angle (in radians) between the two vectors Vect1,Vect2
  2.  
  3. AngBVec(Vect1,Vect2 : VECTOR) : REAL;
  4.  
  5. Receives two vectors Vect1,Vect2 and returns the vector component of Vect1 along Vec2 in Vect3 and the vector component of Vect1 orthogonal to Vect2 in Vect4
  6.  
  7. Comp(Vect1,Vect2 : VECTOR;  VAR Vect3,Vect4 : VECTOR);
  8.  
  9. Returns the standard unit vector of Vect
  10.  
  11. UnitVec(Vect : VECTOR) : VECTOR;
  12.  
  13. Receives an angle and a length and returns a vector
  14.  
  15. Ang2Vec (#Angle, Length : REAL) : REAL;
  16.  
  17. Returns the angle of vector Vect
  18.  
  19. Vec2Ang( Vect : VECTOR) : REAL;
  20.  
  21. Returns a vector which is perpendicular to vector Vect
  22.  
  23. Perp(Vect : VECTOR) : VECTOR;
  24.  
  25. Returns the norm (or length) of the vector Vect
  26.  
  27. Norm( Vect : VECTOR) : REAL;
  28.  
  29.